home *** CD-ROM | disk | FTP | other *** search
/ Games of Daze / Infomagic - Games of Daze (Summer 1995) (Disc 1 of 2).iso / x2ftp / msdos / progsrc / jpeg5b / jpeg-5b / jdatasrc.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-11-10  |  7.6 KB  |  201 lines
  1.  üÖü üÖü  !BBäx!!!BBäx!BBäx"""DDêp""DDêp>"""BBääêp""!"BDäêêp>IÉÆ|      ° @≥î>00>><Dêx  !BBäx""DDêp&<"DDêê&22TTêêê$> $< @äêp>          ⁿBBBB<  @@Ç****DDDDDDDU¬U¬U¬U¬U¬U¬U¬▌w▌w▌w▌w▌w▌w▌w°°°≥■°°≥≥■≥≥■■°°°    ≤  ≤  ≤≤         °                     ≡≡≡≡≡≡≡≡≡≡≡≡≡≡       ;DDD;    $"Bdÿ>@@@>||>Ac]AAA1N"A""2,  `1NA"*III*<Bü üB<<BüüüB<A" \"QIE" < <BBBB  @@    ~ ?  @ÇB$$B ""A$$"AII6 üBr»$**IIII**ccregion.  The region is defined as any pixel of
  2.             OldColor which has a path of pixels of OldColor or NewColor
  3.             with sides touching back to the seed point, (XSeed, YSeed).
  4.             Therefore, only pixels of OldColor are modified and no other
  5.             information is changed.
  6.  
  7.             SEE ALSO
  8.  
  9.             DRWFILLBOX, DRWFILLCIRCLE, DRWFILLELLIPSE, FILLAREA,
  10.             FILLCONVEXPOLY, FILLPAGE, FILLPOLY, FILLSCREEN, FILLVIEW,
  11.             SETVIEW
  12.  
  13.             EXAMPL(HNxHHO$B<BBBB<$<BBBB<<BBBB<$BBBBBF:0BBBBF:$BBBF:B<""AAA""AAAAA"<B@@B<" <2\A">>xDDxDNDD <` <>BB= > <BBBB< BBBBF:2L\bBBBB&AaQIECA8$>""">0@@A>@@@ b$(. b$(*
  14.     $    $    $DDDDDDD¬U¬U¬U¬U¬U¬U¬Uw▌w▌w▌w▌w▌w▌w▌°°°⌠ⁿ°°⌠⌠ⁿ⌠⌠ⁿⁿ°°°    ≈  ≈  ≈≈         °                     ≡≡≡≡≡≡≡≡≡≡≡≡≡≡       7HH7"B\DBBRL~BB@@@@@@?R~!!~?DDDD8BBBB|@@Ç>P>III>"AA""AAA"Uw<DDDD86II6"EIQ"\ @@ "AAAAA> >     hH02L2L$$<H(,$<>>>>>>>         VMODE=VIDEOMODEGET
  15.             IF WHICHVGA = 0 THEN STOP
  16.             DUMMY=RES640
  17.             SETVIEW 100, 100, 539, 379
  18.             FILLVIEW 10
  19.             WHILE INKEY$ = ""
  20.             WEND
  21.             VIDEOMODESET VMODE
  22.             END
  23.  
  24.  
  25.  
  26.  
  27.  
  28.  
  29.  
  30.  
  31.  
  32.  
  33.  
  34.  
  35.  
  36.  
  37.  
  38.  
  39.                                                                          63
  40.  
  41.  
  42.  
  43.  
  44.  
  45.  
  46.           FONTGETINFO
  47.  
  48.             PROTOTYPE
  49.  
  50.             SUB FONTGETINFO (Width%, Height%)
  51.  
  52.             INPUT
  53.  
  54.             no input parameters
  55.     WEND
  56.             MOUSEEXIT
  57.             VIDEOMODESET VMODE
  58.             END
  59.  
  60.  
  61.  
  62.  
  63.  
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70.  
  71.  
  72.  
  73.  
  74.  
  75.  
  76.  
  77.  
  78.  
  79.  
  80.  
  81.  
  82.  
  83.  
  84.  
  85.  
  86.  
  87.  
  88.  
  89.  
  90.  
  91.  
  92.  
  93.  
  94.  
  95.  
  96.  
  97.  
  98.  
  99.                                                                          86
  100.  
  101.  
  102.  
  103.  
  104.  
  105.  
  106.           MOUSECURSORDEFAULT
  107.  
  108.             PROTOTYPE
  109.  
  110.             SUB MOUSECURSORDEFAULT ()
  111.  
  112.             INPUT
  113.  
  114.             no input parameters
  115.  
  116.             OUTPUT
  117.  
  118.             no value returned
  119.  
  120.             USAGE
  121.  
  122.             MOUSECURSORDEFAULT defines the mouse cursor to be a small
  123.        ,K$╖┼╘╤░XQ)σ┤ö≡÷┴─┤àñT┘,╘¬àñX9╘⌠àñ\9╘UÜ╢≤`9╘4a╘d9╘UTa╘h9╘ta╘l9╘Uöa╘p9╘┤a╘t┘PT±x┴îÇ╖0▓ïα│ÅαU┤ôα╡ùα╢¢α╖úΓ╘pǺΓ╕¡αë ╚┴πì°sKÉφb<$⌡▌ë     φë φë I1φë  Eφë $YφÆë (mφë ,üφë 0$òφë á⌐φë ñ╜φë I¿╤φë ¼σφë ░∙φÆë 4
  124. ²ë ┤!²ë ╕$5²ë ╝I²ë └]²ë ⌐8q²ë <àⁿΦiǬ∙PÖÇ ¥Ç
  125. ⁿ
  126. ░╨â@%8@ΓΦá╝╤░≡cÑÅ*$
  127. ░╕≡ż≡τ╥m¿⌡ε    ╨@#µ≈$âh$âαra╨à`¥è∩Ç%Ç +─▀ TîcOî∩â°1<@  [$¿Ç¼ MMl·0ƒ Y¼─!%6a▐è ¥ì ßá+?±  P<îaTTV ╪iÇ¡≥░ `_ñ»%Çá᪠P█º»ε`éa∙É%H«┴íA%Gár∙É
  128. iw∙Éiφ`╧≥≡╤Çmⁿ▒
  129. ]ÆAáσw7░⌡∩    $·╟Ç√É&^`  ┐ $ⁿ  $■ $╒ nk$J-ÉQ1£PéBù »0αQ/Ñ4╜£░ºP≈Ñ4Ç⌡$(ª▀$@C]Æé≈└╕_SÇçÑ4=iÉ⌠ä╣<_np@Ñ45ò▒Y3ü¼Qí░.i>╠@5+┴╙É╛╙$@ #┴@«╦
  130. $╤
  131. #@Ñú4,p&e÷ü¼_ÇQºÑ4
  132. òQ  ü@;¡_áQ@e╠≥@mp!┤a╘O░√`Pñź ÇT°8ÿ!¼Åñ$½╙"q¿ PñCÇ¿α√└╥░eT"ß<p°%Pæ(╧%pδ¥/OêW0Ǽbφ φ B@[â¼8â≥µ≤(    ¿⌡%(Ç∩áTÿp+ óÜ▓0!Σ±(1±
  133. ░┤ÖÇD└D0Å╡`   $ «îO@╧1
  134. a╝╤j-0ñ│`@╖bΦaT1═⌠╝╤Σ²¼±,1öíî9lÿ28ÇÅ`Γî¿P²$,N0┴O0a╫δ≤0σú`°î╖#0δ≡└X▄1»Σî(▒¥Ç█Ñ"qá√1CÇú╟╨º Å
  135. FT Θ²î└1ÇY0    w ²à░$@AÅ`╦Φ¼╘`▄1A  }┐Ç*5 ΩSδδî`¼îaδæ¼î5 1¿⌡Ω╜⌠ ¼¥╬ü└Qî1S
  136. ╛≤î9╨iÇ,∙PU(}Ç$üÇ àÇ`σìÇ`QαÜBO$%ÿÇ╧"$Ç«Ç]É.┬\`%WÉ$  W0 ÄâO0]αG┬ur╩
  137. ░£▒
  138. Q¢ú╔Ç≡°s?`X0╘`@ µWâ@╣aá εdq`¥9?Ç&+o0µyÄΣAÅuV(7P╬±@IdQ╕@Å┤@;Ç▓?Çò│CÇ┤╟╨╡KÇÄ30ⁿφ° ó╬ì+]Ä╦≡     Mö╝σ ²y5<!└▀óâ╝É3~mp    $<╛≤9Æ-2ⁿ≡@T,╞Σa,)Pæ└¥#¼╪Q┤S(¼@Aîa
  139. ≡╤@Ö²±⌠KëD─┴▒▀0╨Ñ$╩-0 ╨ê*╙▓edm`î=3Kß-10è=≥≤²└£mîjy ÿe²ⁿ╨i╕e▓ΣmαÖ╢C%Ç*ê*0 EátQZ`mÄLP%    °üⁿªüNQ∙  T¿<qtWΩc z░ÅÇñΩçǪçÇ«;└<┐á¼¥. á?<Σscî)áí := 0;
  140.       end;
  141.     end;
  142.   end;
  143.   WaitToGo;
  144. end; { UserLineStylePlay }
  145.  
  146.  
  147. procedure SayGoodbye;
  148. { Say goodbye and then exit the program }
  149. var
  150.   ViewInfo : ViewPortType;
  151. begin
  152.   MainWindow('');
  153.   GetViewSettings(ViewInfo);
  154.   SetTextStyle(TriplexFont, HorizDir, 4);
  155.   SetTextJustify(CenterText, CenterText);
  156.   with ViewInfo do
  157.     OutTextXY((x2-x1) div 2, (y2-y1) div 2, 'That''s all folks!');
  158.   StatusLine('Press any key to quit...');
  159.   repeat until KeyPressed;
  160. end; { SayGoodbye }
  161.  
  162.  
  163. PROCEDURE SelectMode;
  164. VAR
  165.     choice1,choice2     : CHAR;
  166.    xsize,ysize            : WORD;
  167. BEGIN
  168.     (* Let's select a mode *)
  169.     ClrScr;
  170.     WriteLn('VESADEMO:');
  171.     WriteLn('1. 256 colors');
  172.     WriteLn('2. 32768 colors');
  173.     WriteLn('3. 65536 colors');
  174.     WriteLn('4. 16777216 colors');
  175.     WriteLn('Q uit');
  176.     WriteLn;
  177.     Write('Your choice: ');
  178.     REPEAT
  179.         ReadLn(choice1);
  180.       IF choice1 <> '1' THEN BEGIN
  181.           WriteLn('Sorry !');
  182.          WriteLn('This demo wasn''t written for more as 256 colors !');
  183.          WriteLn('You would only get a limited impression of the Hi-& TrueColor modes...');
  184.          WriteLn('Switching to 256 colors.');
  185.          choice1 := '1';
  186.       END;
  187.     UNTIL choice1 IN ['1'..'4','q'];
  188.     IF choice1 = 'q' THEN Halt;
  189.  
  190.     WriteLn;
  191.     WriteLn;
  192.     WriteLn('a. 320x200');
  193.     WriteLn('b. 640x480');
  194.     WriteLn('c. 800x600');
  195.     WriteLn('d. 1024x768');
  196.     WriteLn('e. 1280x1024');
  197.     WriteLn('Q uit');
  198.     WriteLn;
  199.     Write('Your choice: ');
  200.     REPEAT
  201.         ReadLn(choice2);
  202.     UNTIL choice2 IN ['a'..'e','q'];
  203.     IF choice2 = 'q' THEN Halt;
  204.  
  205.     CASE choice2 OF
  206.         'a' : BEGIN
  207.             xsize := 320;
  208.             ysize := 200;
  209.         END;
  210.         'b' : BEGIN
  211.             xsize := 640;
  212.